Freelog 50/Freelog050.iso/DossierLogitheque/Bureautique/Kplan/inst_kplan.exe/{app}/KPlan.exe/0/RCDATA/TMAINFORM/TMAINFORM.txt

Text File | 2003-10-19 | 29KB | 1,049 lines

object MainForm: TMainForm
  Left = 1
  Top = 1
  AutoScroll = False
  Caption = 'Kplan'
  ClientHeight = 543
  ClientWidth = 790
  Color = 14602961
  Constraints.MinWidth = 200
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'Default'
  Font.Style = []
  OldCreateOrder = True
  Position = poDefault
  ShowHint = True
  WindowState = wsMaximized
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnKeyUp = FormKeyUp
  OnShortCut = FormShortCut
  PixelsPerInch = 96
  TextHeight = 13
  object statusbar: TStatusBar
    Left = 0
    Top = 469
    Width = 790
    Height = 24
    BiDiMode = bdLeftToRight
    Color = 13285301
    Panels = <
      item
        Alignment = taCenter
        Style = psOwnerDraw
        Text = 'M'#233'tag'#233'nia (www.metagenia.com)'
        Width = 600
      end
      item
        Alignment = taCenter
        Style = psOwnerDraw
        Width = 70
      end
      item
        Alignment = taRightJustify
        Style = psOwnerDraw
        Width = 160
      end>
    ParentBiDiMode = False
    SizeGrip = False
    OnDrawPanel = statusbarDrawPanel
    OnResize = statusbarResize
  end
  object Panelbordure_gauche: TPanel
    Left = 0
    Top = 22
    Width = 3
    Height = 447
    Align = alLeft
    BevelOuter = bvNone
    ParentColor = True
    TabOrder = 1
  end
  object TLB_menu: TToolBar
    Left = 0
    Top = 0
    Width = 790
    Height = 22
    AutoSize = True
    ButtonWidth = 83
    Constraints.MinWidth = 200
    EdgeBorders = []
    EdgeOuter = esNone
    Flat = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Images = DM_metier.IL_commun
    Indent = 1
    List = True
    ParentFont = False
    ParentShowHint = False
    ShowCaptions = True
    ShowHint = True
    TabOrder = 2
    Wrapable = False
    OnCustomDraw = TLB_menuCustomDraw
    OnResize = TLB_menuResize
    object TLB_fichier: TToolButton
      Left = 1
      Top = 0
      AutoSize = True
      Caption = '&Fichier'
      Grouped = True
      MenuItem = File1
    end
    object TLB_rapports: TToolButton
      Left = 43
      Top = 0
      Hint = 'Commandes relatives aux rapports'
      AutoSize = True
      Caption = '&Rapports'
      Grouped = True
      MenuItem = Menu_principal_Rapports1
    end
    object TLB_outils: TToolButton
      Left = 97
      Top = 0
      Hint = 'Commandes relatives au fen'#234'tres'
      AutoSize = True
      Caption = '&Outils'
      Grouped = True
      MenuItem = Menu_principal_outils
    end
    object TLB_fenetres: TToolButton
      Left = 134
      Top = 0
      AutoSize = True
      Caption = 'F&en'#234'tres'
      Grouped = True
      MenuItem = Fentres1
      Visible = False
    end
    object TLB_aide: TToolButton
      Left = 186
      Top = 0
      Hint = 'Menu aide'
      AutoSize = True
      Caption = '&?'
      Grouped = True
      MenuItem = Menu_principal_aide
    end
    object TLB_affichage: TToolButton
      Left = 203
      Top = 0
      AutoSize = True
      Caption = 'Affichage'
      MenuItem = Affichage1
      Visible = False
    end
    object TB_separ: TPaintBox
      Left = 259
      Top = 0
      Width = 25
      Height = 22
      OnPaint = TB_separPaint
    end
    object Panel_cadre_de_vie: TPanel
      Left = 284
      Top = 0
      Width = 369
      Height = 22
      BevelOuter = bvNone
      ParentColor = True
      TabOrder = 0
      inline Cadre_vie1: TCadre_vie
        Left = 0
        Top = 0
        Width = 369
        Height = 22
        Align = alClient
        AutoScroll = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        inherited PM_3vies: TPopupMenu
          Left = 112
        end
      end
    end
    object TB_separ2: TPaintBox
      Left = 653
      Top = 0
      Width = 24
      Height = 22
      OnPaint = TB_separPaint
    end
    object TLB_poubelle: TToolButton
      Left = 677
      Top = 0
      Cursor = crHandPoint
      Action = DM_metier.Act_vider_poubelle
      AutoSize = True
      DropdownMenu = PM_poubelle
      Style = tbsDropDown
    end
    object TLB_enregistrer: TToolButton
      Left = 762
      Top = 0
      Cursor = crHandPoint
      Action = DM_metier.Act_enregistrer
      AutoSize = True
      Grouped = True
    end
    object TLB_rapideo: TToolButton
      Left = 843
      Top = 0
      Cursor = crHandPoint
      AutoSize = True
      Caption = '&Vite !!!'
      DropdownMenu = PM_rapideo
      ImageIndex = 46
      Style = tbsDropDown
      Visible = False
    end
    object TLB_separ: TToolButton
      Left = 917
      Top = 0
      Width = 8
      ImageIndex = 38
      Style = tbsSeparator
    end
    object TLB_commande: TToolButton
      Left = 925
      Top = 0
      Cursor = crHandPoint
      Action = DM_metier.Act_commande
      AutoSize = True
      Grouped = True
      ParentShowHint = False
      ShowHint = True
    end
  end
  object PC_mode_normal_diaporama: TPageControl_MTG
    Left = 3
    Top = 22
    Width = 787
    Height = 447
    ActivePage = TS_KPLAN
    Align = alClient
    TabOrder = 3
    bordure = False
    object TS_KPLAN: TTabSheet
      Caption = 'TS_KPLAN'
      object PC_kplan: TPageControl_MTG
        Left = 0
        Top = 32
        Width = 787
        Height = 397
        Hint = ' '
        ActivePage = TS_documents
        Align = alClient
        Images = DM_metier.ImageList_onglet
        TabHeight = 28
        TabOrder = 0
        TabWidth = 170
        bordure = False
        object TS_vue_generale: TTabSheet
          Caption = 'Calendrier'
          ImageIndex = 5
          object Panel_bureau: TPanel
            Left = 0
            Top = 0
            Width = 911
            Height = 454
            Align = alClient
            BevelOuter = bvNone
            BorderWidth = 3
            Color = clWhite
            TabOrder = 0
            object VSplitter_left: TSplitter
              Left = 3
              Top = 3
              Height = 448
              AutoSnap = False
              Visible = False
            end
            object VSplitter_right: TSplitter
              Left = 905
              Top = 3
              Height = 448
              Align = alRight
              AutoSnap = False
              Visible = False
            end
            object DockPanelLeft: TPanel
              Left = 6
              Top = 3
              Width = 0
              Height = 448
              Align = alLeft
              DockSite = True
              TabOrder = 0
              OnDockDrop = DockPanelLeftDockDrop
              OnDockOver = DockPanelLeftDockOver
              OnGetSiteInfo = DockPanelLeftGetSiteInfo
              OnUnDock = DockPanelLeftUnDock
            end
            object dockPanelright: TPanel
              Left = 908
              Top = 3
              Width = 0
              Height = 448
              Align = alRight
              DockSite = True
              TabOrder = 1
              OnDockDrop = DockPanelLeftDockDrop
              OnDockOver = DockPanelLeftDockOver
              OnGetSiteInfo = DockPanelLeftGetSiteInfo
              OnUnDock = DockPanelLeftUnDock
            end
          end
        end
        object TS_notes_et_activites: TTabSheet
          Caption = 'Notes & Activit'#233's                     '
          object Panel_activites_et_notes: TPanel
            Left = 0
            Top = 0
            Width = 737
            Height = 454
            Align = alClient
            BevelOuter = bvNone
            BorderWidth = 3
            Color = clSilver
            TabOrder = 0
          end
        end
        object TS_contacts: TTabSheet
          Caption = 'Contacts              '
          ImageIndex = 1
          object Panel_contact: TPanel
            Left = 0
            Top = 0
            Width = 737
            Height = 454
            Align = alClient
            BevelOuter = bvNone
            BorderWidth = 3
            Color = 11522486
            TabOrder = 0
          end
        end
        object TS_documents: TTabSheet
          Caption = 'Documents               '
          ImageIndex = 2
          object Panel_document: TPanel
            Left = 0
            Top = 0
            Width = 787
            Height = 369
            Align = alClient
            BevelOuter = bvNone
            BorderWidth = 3
            Color = 14335928
            TabOrder = 0
          end
        end
        object TS_ressources: TTabSheet
          Caption = 'Ressources                '
          ImageIndex = 3
          object Panel_ressource: TPanel
            Left = 0
            Top = 0
            Width = 737
            Height = 454
            Align = alClient
            BevelOuter = bvNone
            BorderWidth = 3
            Color = 12045019
            TabOrder = 0
          end
        end
      end
      object Panel_haut_Page_Control: TPanel
        Left = 0
        Top = 0
        Width = 787
        Height = 32
        Align = alTop
        BevelOuter = bvNone
        BiDiMode = bdLeftToRight
        ParentBiDiMode = False
        ParentColor = True
        TabOrder = 1
        Visible = False
        object ToolBar1: TToolBar
          Left = 638
          Top = 0
          Width = 149
          Align = alRight
          BorderWidth = 1
          ButtonWidth = 102
          Caption = 'ToolBar1'
          EdgeBorders = []
          Flat = True
          Images = DM_metier.IL_commun
          List = True
          ShowCaptions = True
          TabOrder = 0
          object TLB_tools: TToolButton
            Left = 0
            Top = 0
            Cursor = crHandPoint
            Action = DM_metier.Act_calculatrice_temporelle
            AutoSize = True
            DropdownMenu = PM_calculeo
            Grouped = True
            PopupMenu = PM_calculeo
            Style = tbsDropDown
          end
        end
      end
    end
    object TS_diaporama: TTabSheet
      Caption = 'TS_diaporama'
      ImageIndex = 1
    end
  end
  object Panel_pour_cadre_pub: TPanel
    Left = 0
    Top = 493
    Width = 790
    Height = 50
    Align = alBottom
    BevelOuter = bvNone
    ParentColor = True
    TabOrder = 5
    Visible = False
  end
  object Timer1: TTimer
    Interval = 10000
    OnTimer = Timer1Timer
    Left = 104
    Top = 104
  end
  object ImageList_menu: TImageList
    Left = 71
    Top = 106
  end
  object PM_calculeo: TPopupMenu
    OwnerDraw = True
    Left = 491
    Top = 51
    object rt1: TMenuItem
      Action = DM_metier.Act_calculatrice_temporelle
      OnAdvancedDrawItem = MainMenuAdvancedDrawItem
      OnMeasureItem = MainmenuMeasureItem
    end
    object Calculatrice2: TMenuItem
      Action = DM_metier.Act_calculatrice_windows
      OnAdvancedDrawItem = MainMenuAdvancedDrawItem
      OnMeasureItem = MainmenuMeasureItem
    end
    object abledecaractres1: TMenuItem
      Action = DM_metier.Act_charmap
      OnAdvancedDrawItem = MainMenuAdvancedDrawItem
      OnMeasureItem = MainmenuMeasureItem
    end
    object Tarifolatrice1: TMenuItem
      Caption = 'Tarifolatrice...'
      Visible = False
    end
    object Fricaculateur1: TMenuItem
      Caption = 'Fricaculateur...'
      Visible = False
    end
  end
  object PM_rapideo: TPopupMenu
    Left = 407
    Top = 56
    object Appeltlphonique1: TMenuItem
      Caption = 'Appel t'#233'l'#233'phonique'
    end
    object Rendezvous1: TMenuItem
      Caption = 'Rendez-vous'
    end
    object Avoi1: TMenuItem
      Caption = 'A voir'
    end
    object Afaire1: TMenuItem
      Caption = 'A faire'
    end
    object Astuces1: TMenuItem
      Caption = 'Astuces'
    end
    object N10: TMenuItem
      Caption = '-'
    end
    object Dictionnaire1: TMenuItem
      Caption = 'Dictionnaire'
    end
    object FAQ1: TMenuItem
      Caption = 'F.A.Q'
    end
  end
  object ActionList1: TActionList
    Images = DM_metier.IL_commun
    Left = 214
    Top = 124
    object Act_fenetre_donnees: TAction
      Caption = 'Base d'#39'objets structur'#233's...'
      OnExecute = Act_fenetre_donneesExecute
      OnUpdate = Act_fenetre_donneesUpdate
    end
    object Act_constructeur_de_requete: TAction
      Caption = 'Constructeur de Requ'#234'tes...'
      OnExecute = Act_constructeur_de_requeteExecute
      OnUpdate = Act_constructeur_de_requeteUpdate
    end
    object Act_constructeur_de_modele: TAction
      Caption = 'Constructeur de Mod'#232'les...'
      OnExecute = Act_constructeur_de_modeleExecute
      OnUpdate = Act_constructeur_de_modeleUpdate
    end
    object Act_assistant_klibre: TAction
      Caption = 'Assistant "Gestion de la dur'#233'e des activit'#233's"...'
      OnExecute = Act_assistant_klibreExecute
      OnUpdate = Act_assistant_klibreUpdate
    end
    object Act_licence: TAction
      Caption = 'Licence de Kplan...'
      Hint = 'Licence...|Texte de la licence de Kplan...'
      ImageIndex = 6
      OnExecute = Act_licenceExecute
      OnUpdate = Act_licenceUpdate
    end
    object Act_a_propos: TAction
      Caption = 'A propos...'
      Hint = 'A propos...|Fen'#234'tre '#224' propos...'
      OnExecute = Act_a_proposExecute
    end
    object Act_acheter_kplan_plus: TAction
      Caption = 'acheter Kplan PLUS'
      Hint = 'Achat en ligne du logiciel Kplan PLUS'
      ImageIndex = 16
      OnExecute = Act_acheter_kplan_plusExecute
      OnUpdate = Act_acheter_kplan_plusUpdate
    end
    object Act_kplan_perso: TAction
      Caption = 'Kplan PERSO'
      Hint = 'Informations sur le logiciel Kplan PERSO'
      ImageIndex = 16
      OnExecute = Act_kplan_persoExecute
      OnUpdate = Act_kplan_persoUpdate
    end
    object Act_ouvrir_fichier: TAction
      Caption = 'Ouvrir Fichier...'
      Hint = 'Ouvrir...|Ouvrir un fichier'
      ImageIndex = 4
      ShortCut = 16463
      OnExecute = Act_ouvrir_fichierExecute
      OnUpdate = Act_ouvrir_fichierUpdate
    end
    object Act_kplan_plus: TAction
      Caption = 'Kplan PLUS'
      Hint = 'Informations sur le logiciel Kplan PLUS'
      ImageIndex = 16
      OnExecute = Act_kplan_plusExecute
      OnUpdate = Act_kplan_plusUpdate
    end
    object Act_rafraichir: TAction
      Caption = 'Act_rafraichir'
      ShortCut = 116
      OnExecute = Act_rafraichirExecute
    end
    object act_fermer: TAction
      Caption = 'Fermer'
      ImageIndex = 44
      ShortCut = 16499
      OnExecute = act_fermerExecute
      OnUpdate = act_fermerUpdate
    end
    object Act_voter_pour_kplan: TAction
      Caption = 'Votez pour %s...'
      ImageIndex = 16
      OnExecute = Act_voter_pour_kplanExecute
      OnUpdate = Act_voter_pour_kplanUpdate
    end
    object Act_regles_de_gestion: TAction
      Caption = 'R'#232'gles de gestion...'
      OnExecute = Act_regles_de_gestionExecute
      OnUpdate = Act_regles_de_gestionUpdate
    end
    object Act_montrer_application: TAction
      Caption = 'Act_montrer_application'
      ImageIndex = 13
      OnExecute = Act_montrer_applicationExecute
      OnUpdate = Act_montrer_applicationUpdate
    end
    object Act_cacher_application: TAction
      Caption = 'Act_cacher_application'
      ImageIndex = 12
      OnExecute = Act_cacher_applicationExecute
      OnUpdate = Act_cacher_applicationUpdate
    end
    object Act_vente: TAction
      Caption = 'Act_vente'
      OnExecute = Act_venteExecute
      OnUpdate = Act_venteUpdate
    end
    object Act_mail_MTG: TAction
      Caption = 'Act_mail_MTG'
      OnExecute = Act_mail_MTGExecute
      OnUpdate = Act_mail_MTGUpdate
    end
  end
  object PiconeBarreTache1: TPiconeBarreTache
    MenuPop = PM_barre_tache
    ReduireSiFin = False
    CacherSiMinimize = True
    PetiteIconeVisible = True
    GrandeIconeVisible = True
    ApplicationCachee = False
    IntervalAnimation = 1000
    Animation = True
    NumIconeImageList = 0
    Hint = 'Kplan'
    GrandeIconBlink = False
    IntervalGrandeIconeBlink = 1000
    OuvreSiClicGauche = True
    OuvreSiDblClick = False
    MenuSiClicDroit = True
    MenuSiClicGauche = False
    Left = 62
    Top = 224
  end
  object PM_barre_tache: TPopupMenu
    Images = DM_metier.IL_commun
    MenuAnimation = [maRightToLeft]
    OwnerDraw = True
    Left = 94
    Top = 224
    object A1: TMenuItem
      Action = Act_cacher_application
      OnAdvancedDrawItem = MainMenuAdvancedDrawItem
      OnMeasureItem = MainmenuMeasureItem
    end
    object B1: TMenuItem
      Action = Act_montrer_application
      OnAdvancedDrawItem = MainMenuAdvancedDrawItem
      OnMeasureItem = MainmenuMeasureItem
    end
    object Creer_tray_activites: TMenuItem
      Caption = 'Notes et Activit'#233's'
      OnAdvancedDrawItem = MainMenuAdvancedDrawItem
      OnMeasureItem = MainmenuMeasureItem
    end
    object Creer_tray_contacts: TMenuItem
      Caption = 'Contacts'
      OnAdvancedDrawItem = MainMenuAdvancedDrawItem
      OnMeasureItem = MainmenuMeasureItem
    end
    object Creer_tray_document: TMenuItem
      Caption = 'Documents'
      OnAdvancedDrawItem = MainMenuAdvancedDrawItem
      OnMeasureItem = MainmenuMeasureItem
    end
    object N17: TMenuItem
      Caption = '-'
      OnAdvancedDrawItem = MainMenuAdvancedDrawItem
      OnMeasureItem = MainmenuMeasureItem
    end
    object Chronodatrice1: TMenuItem
      Action = DM_metier.Act_calculatrice_temporelle
      OnAdvancedDrawItem = MainMenuAdvancedDrawItem
      OnMeasureItem = MainmenuMeasureItem
    end
    object N16: TMenuItem
      Caption = '-'
      OnAdvancedDrawItem = MainMenuAdvancedDrawItem
      OnMeasureItem = MainmenuMeasureItem
    end
    object Quitter1: TMenuItem
      Caption = 'Quitter'
      OnClick = Quitter1Click
      OnAdvancedDrawItem = MainMenuAdvancedDrawItem
      OnMeasureItem = MainmenuMeasureItem
    end
  end
  object MainMenu_kplan: TMainMenu
    Images = DM_metier.IL_commun
    Left = 40
    Top = 104
    object File1: TMenuItem
      Caption = '&Fichier'
      object Nouveau1: TMenuItem
        Caption = 'Nouveau'
        ImageIndex = 24
        object Fichier1: TMenuItem
          Caption = 'Fichier...'
          Hint = 'Nouveau fichier|Cr'#233'er et ouvrir un nouveau fichier'
          ImageIndex = 30
          OnClick = Fichier1Click
        end
        object N1: TMenuItem
          Caption = '-'
          Visible = False
        end
        object NotesetActivites1: TMenuItem
          Caption = 'Notes et Activites'
          Visible = False
        end
        object Contacts1: TMenuItem
          Caption = 'Contacts'
          Visible = False
        end
        object Documents1: TMenuItem
          Caption = 'Documents'
          Visible = False
        end
      end
      object N2: TMenuItem
        Caption = '-'
        Visible = False
      end
      object Ouvrir2: TMenuItem
        Action = Act_ouvrir_fichier
      end
      object Rouvrir1: TMenuItem
        Caption = 'R'#233'ouvrir'
        Enabled = False
        ImageIndex = 4
      end
      object Fermer1: TMenuItem
        Action = act_fermer
      end
      object N7: TMenuItem
        Caption = '-'
      end
      object Enregistrer1: TMenuItem
        Action = DM_metier.Act_enregistrer
      end
      object Enregistrersous1: TMenuItem
        Action = DM_metier.Act_enregistrer_sous
      end
      object Regrouperetenregistrer1: TMenuItem
        Action = DM_metier.Act_relatif
      end
      object N9: TMenuItem
        Caption = '-'
        Visible = False
      end
      object Imprimer1: TMenuItem
        Caption = 'Im&primer'
        ImageIndex = 26
        ShortCut = 16464
        Visible = False
      end
      object N12: TMenuItem
        Caption = '-'
        Visible = False
      end
      object Importer1: TMenuItem
        Action = DM_metier.Act_importer_donnees
      end
      object Actexporterdonnees1: TMenuItem
        Action = DM_metier.Act_exporter_donnees
      end
      object Fusionner1: TMenuItem
        Action = DM_metier.Act_fusionner
      end
      object Extraction1: TMenuItem
        Action = DM_metier.Act_extraction
      end
      object N3: TMenuItem
        Caption = '-'
        Visible = False
      end
      object Quitterdfinitivement1: TMenuItem
        Action = DM_metier.Act_quitter_definitivement
      end
    end
    object Menu_principal_Rapports1: TMenuItem
      Caption = '&Rapports'
      Hint = 'Commandes relatives aux rapports'
      object MI_rapport_calendriers: TMenuItem
        Caption = 'Rapport "Calendriers"'
        Hint = 'Visualiser  / Imprimer les calendriers'
        ImageIndex = 6
        Visible = False
        object SSMI_calendrier_courant: TMenuItem
          Caption = 'calendrier courant'
          Visible = False
        end
        object SSMI_select_calendrier: TMenuItem
          Caption = 'select calendrier'
          ImageIndex = 6
        end
      end
      object MI_gestion_notes_et_activites: TMenuItem
        Caption = 'Rapport "Notes et activit'#233's"'
        Hint = 'Visualiser  / Imprimer toutes les activit'#233's'
        ImageIndex = 6
        Visible = False
        object Actrapporttouslesnotes1: TMenuItem
          Caption = 'Impression d'#233'taill'#233'e...'
          Hint = 'Visualiser toutes les notes'
          ImageIndex = 6
          ShortCut = 49230
        end
        object ActRapportdtaill1: TMenuItem
          Caption = 'Impression simplifi'#233'e (1 note = 1 ligne)...'
          ImageIndex = 6
        end
        object N4: TMenuItem
          Caption = '-'
        end
        object VisualiserImprimercalendrier1: TMenuItem
          Caption = 'Selection de Notes et activit'#233's...'
          ImageIndex = 6
          Visible = False
        end
      end
      object MI_Gestion_des_contacts: TMenuItem
        Caption = 'Rapport "Contacts"'
        ImageIndex = 6
        Visible = False
        object Rapportindividu1: TMenuItem
          Caption = 'Tous les individus'
          Hint = 'Visualiser toutes les individus'
          ImageIndex = 6
          Visible = False
        end
        object Rapportsurlessocits1: TMenuItem
          Caption = 'Toutes les soci'#233't'#233's'
          Hint = 'Act_visu_rapport_societe'
          ImageIndex = 6
          Visible = False
        end
        object Actvisurapportindividuprivate1: TMenuItem
          Caption = 'Act_visu_rapport_individus_detailles'
          ImageIndex = 6
        end
      end
      object MI_gestion_Gestion_des_documents: TMenuItem
        Caption = 'Rapport "Documents"'
        ImageIndex = 6
        Visible = False
        object Touslesdocuments1: TMenuItem
          Caption = 'TOUS les documents'
          ImageIndex = 6
          Visible = False
        end
        object MI_facture: TMenuItem
          Caption = 'MI_facture'
        end
      end
    end
    object Menu_principal_outils: TMenuItem
      Caption = '&Outils'
      Hint = 'Commandes relatives au fen'#234'tres'
      object Optionsdenvironnement1: TMenuItem
        Action = DM_metier.Act_options
      end
      object c1: TMenuItem
        Action = Act_regles_de_gestion
      end
      object Statistiques1: TMenuItem
        Action = DM_metier.Act_statistiques
      end
      object Fonctionnalits1: TMenuItem
        Caption = 'Fonctionnalit'#233's'
        Visible = False
        object Changerlefonddelapplication1: TMenuItem
          Caption = 'Changer le fond de l'#39'application'
          Hint = 'Pour changer le fond '
        end
        object AjoutSupprimerfond2: TMenuItem
          Caption = 'Ajout/Supprimer fond'
          Checked = True
        end
      end
      object Zoom1: TMenuItem
        Caption = 'Zoom Plein Ecran'
        ImageIndex = 23
        Visible = False
        OnClick = Zoom1Click
      end
      object ModifierlemotdepasseAdministrateur1: TMenuItem
        Action = DM_metier.Act_modifier_password_admin
      end
      object N6: TMenuItem
        Caption = '-'
      end
      object Calculatrice1: TMenuItem
        Action = DM_metier.Act_calculatrice_temporelle
      end
      object Calculatrice3: TMenuItem
        Action = DM_metier.Act_calculatrice_windows
      end
      object abledecaractres2: TMenuItem
        Action = DM_metier.Act_charmap
      end
      object debugg: TMenuItem
        Caption = 'Act_test'
        Visible = False
      end
      object Acttest1: TMenuItem
        Caption = 'Act_debug'
        Visible = False
      end
      object Gestiondutemps1: TMenuItem
        Caption = 'Gestion du temps...'
        ImageIndex = 43
        Visible = False
      end
      object WindowCascadeItem: TMenuItem
        Caption = '&Cascade'
        Hint = 'Cascade'
        Visible = False
      end
      object WindowTileItem: TMenuItem
        Caption = 'Mosa'#239'que &horizontale'
        Hint = 'Mosa'#239'que horizontale'
        Visible = False
      end
      object WindowTileItem2: TMenuItem
        Caption = 'Mosa'#239'que &verticale'
        Hint = 'Mosa'#239'que verticale'
        Visible = False
      end
      object WindowMinimizeItem: TMenuItem
        Caption = '&Tout r'#233'duire'
        Hint = 'Tout r'#233'duire'
        Visible = False
      end
      object WindowArrangeItem: TMenuItem
        Caption = 'Tout r'#233'&organiser'
        Hint = 'Tout r'#233'organiser'
        Visible = False
      end
      object N14: TMenuItem
        Caption = '-'
      end
      object Configurerlesoutils1: TMenuItem
        Action = DM_metier.Act_configurer_outils
      end
      object N15: TMenuItem
        Caption = '-'
      end
    end
    object Affichage1: TMenuItem
      Caption = 'Affichage'
      Visible = False
    end
    object Fentres1: TMenuItem
      Caption = 'F&en'#234'tres'
      Visible = False
      object ActmailMTG1: TMenuItem
        Action = Act_mail_MTG
      end
      object ConstructeurdeModles1: TMenuItem
        Action = Act_constructeur_de_modele
      end
      object ConstructeurdeRequtes1: TMenuItem
        Action = Act_constructeur_de_requete
      end
      object Fenetreinput1: TMenuItem
        Action = Act_fenetre_donnees
      end
      object AssistantGestiondeladuredesactivits1: TMenuItem
        Action = Act_assistant_klibre
      end
      object Gestiondeslieux1: TMenuItem
        Action = DM_metier.Act_gestion_des_lieux
      end
      object Actgestionworkflow1: TMenuItem
        Action = DM_metier.Act_gestion_workflow
      end
    end
    object Menu_principal_aide: TMenuItem
      Caption = '&?'
      Hint = 'Menu aide'
      object Aide1: TMenuItem
        Action = DM_metier.Act_aide_en_ligne
      end
      object N11: TMenuItem
        Caption = '-'
      end
      object Vossuggestions1: TMenuItem
        Action = DM_metier.Act_suggestions
      end
      object Actvoterpourkplan1: TMenuItem
        Action = Act_voter_pour_kplan
      end
      object SoumettreunBUG1: TMenuItem
        Action = DM_metier.Act_rapporter_BUG
      end
      object N13: TMenuItem
        Caption = '-'
      end
      object La1: TMenuItem
        Action = DM_metier.Act_page_du_produit
        Caption = 'Page sur le Web du produit'
      end
      object KplanPERSOgratuit1: TMenuItem
        Action = Act_kplan_perso
      end
      object KplanPLUSpayant1: TMenuItem
        Action = Act_kplan_plus
      end
      object acheterKplanPLUS1: TMenuItem
        Action = Act_acheter_kplan_plus
      end
      object N8: TMenuItem
        Caption = '-'
      end
      object LicenceNoto1: TMenuItem
        Action = Act_licence
      end
      object Apropos1: TMenuItem
        Action = Act_a_propos
      end
    end
  end
  object ApplicationEvents1: TApplicationEvents
    OnActionExecute = ApplicationEvents1ActionExecute
    OnActivate = ApplicationEvents1Activate
    OnException = ApplicationEvents1Exception
    OnMessage = ApplicationEvents1Message
    OnRestore = ApplicationEvents1Restore
    OnSettingChange = ApplicationEvents1SettingChange
    Left = 518
    Top = 168
  end
  object PM_poubelle: TPopupMenu
    OwnerDraw = True
    Left = 382
    Top = 136
    object Viderpoubelledesactivits1: TMenuItem
      Action = DM_metier.Act_vider_poubelle_activites
      OnAdvancedDrawItem = MainMenuAdvancedDrawItem
      OnMeasureItem = MainmenuMeasureItem
    end
    object Viderpoubelledesactivits3: TMenuItem
      Action = DM_metier.Act_vider_poubelle_contacts
      OnAdvancedDrawItem = MainMenuAdvancedDrawItem
      OnMeasureItem = MainmenuMeasureItem
    end
    object Viderpoubelledesactivits2: TMenuItem
      Action = DM_metier.Act_vider_poubelle_documents
      OnAdvancedDrawItem = MainMenuAdvancedDrawItem
      OnMeasureItem = MainmenuMeasureItem
    end
    object Viderpoubelledesressources1: TMenuItem
      Action = DM_metier.Act_vider_poubelle_ressources
      OnAdvancedDrawItem = MainMenuAdvancedDrawItem
      OnMeasureItem = MainmenuMeasureItem
    end
  end
end